home *** CD-ROM | disk | FTP | other *** search
/ Revolution - Das Atari CD Magazin 1997 / Revolution - Das Atari CD Magazin 1.iso / software / anwendng / qed_397 / modula.krz < prev    next >
Text File  |  1996-12-19  |  2KB  |  114 lines
  1. #
  2. # QED Kürzel-Datei für Modula2
  3. #
  4. # Ein Kürzel darf max. 8 Buchstaben umfassen.
  5. # Dieses Kürzel wird durch drücken der ESC zu dem Text nach dem 
  6. # '='-Zeichen expandiert. Hierbei werden alle Zeichen bis zum Zeilenende
  7. # benutz. 
  8. # Wenn vor dem '=' ein '*' steht, wird das Kürzel automatisch expandiert, 
  9. # sobald es vollständig eigegeben ist.
  10. # Außerdem kann der Text hinter dem '='-Zeichen eine Tilde ('~')
  11. # enthalten. Sie gibt die Position an, an der der Cursor nach dem 
  12. # expandieren stehen soll. Ist sie nicht angegeben, befindet sich der
  13. # Cursor anschließend am Ende des Text.
  14. # Mit ^^ kann ein Zeilenumbruch hervorgerufen werden. Damit sind auch 
  15. # mehrzeilige Kürzel möglich!
  16. #
  17. a  =AND 
  18. ab =ABS(~)
  19. ac =ARRAY ~OF CHAR;
  20. ad =ADDRESS;
  21. ai =ARRAY ~OF INTEGER;
  22. al =ARRAY OF LOC
  23. ar =ARRAY [~..] OF 
  24. b  =BEGIN
  25. bl =BOOLEAN;
  26. bs =BITSET;
  27. bt =BYTE;
  28. cp =CAP(~)
  29. cd =CARDINAL;
  30. cs =CASE ~ OF
  31. c  =CHAR;
  32. cr =CHR(~)
  33. cn =CONST
  34. dc =DEC(~)
  35. dm =DEFINITION MODULE ~;
  36. dp =DISPOSE(~);
  37. dv =DIV 
  38. e  =ELSE
  39. es =ELSIF 
  40. en =END ~;
  41. ec =END(*CASE*);
  42. ef =END(*FOR*);
  43. ei =END(*IF*);
  44. el =END(*LOOP*);
  45. er =END(*RECORD*);
  46. ew =END(*WHILE*);
  47. eh =END(*WITH*);
  48. et =EXIT;
  49. ex =EXPORT ;
  50. eq =EXPORT QUALIFIED ~;
  51. f  =FALSE
  52. fi =FROM ~IMPORT 
  53. fl =FLOAT(~)
  54. fo =FOR ~:= TO DO
  55. gm =GD.Msg("~");
  56. i  =IF ~ THEN
  57. im =IMPLEMENTATION MODULE ~;
  58. in =IN 
  59. ic =INC(~);
  60. il =INCL(~);
  61. ip =IMPORT ~;
  62. it =INTEGER;
  63. iwc=IO.WriteChar(~);
  64. iwi=IO.WriteInt(~);
  65. iwl=IO.WriteLn;
  66. iwr=IO.WriteReal(~);
  67. iws=IO.WriteString("~");
  68. lb =LONGBITSET;
  69. lc =LONGCARD;
  70. li =LONGINT; 
  71. lr =LONGREAL;
  72. l  =LOOP
  73. m  =MOD 
  74. mo =MODULE ~;
  75. ne =NEW(~);
  76. ni =NIL
  77. n  =NOT 
  78. od =ODD(~);
  79. of =OF 
  80. o  =OR 
  81. or =ORD(~);
  82. pt =POINTER TO 
  83. pr =PROC;
  84. p  =PROCEDURE 
  85. ra =REAL;
  86. re =RECORD
  87. rp =REPEAT
  88. r  =RETURN ~;
  89. rd =Read(~);
  90. rc =ReadCard(~);
  91. ri =ReadInt(~);
  92. rr =ReadReal(~);
  93. rs =ReadStr(~);
  94. s  =SET OF 
  95. si =SIZE(~);
  96. st =String;
  97. to =TO 
  98. t  =TRUE
  99. tc =TRUNC(~);
  100. th =THEN
  101. ts =TSIZE(~);
  102. ty =TYPE
  103. u  =UNTIL 
  104. v  =VAR 
  105. w  =WHILE ~ DO
  106. wh =WITH ~ DO
  107. wo =WORD;
  108. we =Write(~);
  109. wc =WriteCard(~,0);
  110. wi =WriteInt(~,0);
  111. wl =WriteLn;
  112. wr =WriteReal(~,,);
  113. ws =WriteString("~");
  114.